unit IDataPersistentUnit;

interface

uses
  CardServer_TLB;

type
  IDLLDataPersistent = interface(IUnknown)
    ['{603F6DA0-0046-4425-95C8-9EB66598FAC8}']
    procedure SetIDataPerDisp(pIRDMDataPerDisp: IRDMCardServerDisp); safecall;
    function GetIDataPerDisp: IRDMCardServerDisp; safecall;

    function BeginTrans(out pMsg: WideString): Boolean; safecall;
    function CommitTrans(out pMsg: WideString): Boolean; safecall;
    function RollBackTrans(out pMsg: WideString): Boolean; safecall;
    function SelectData(const PWStr: pWideString; var pPrvName: WideString): Boolean; stdcall;
    function InsertDataSet(const PWStr: pWideString; out pMsg: WideString): Boolean; stdcall;
    function UpdateDataSet(const PWStr: pWideString; out pMsg: WideString): Boolean; stdcall;
    function DeleteDataSet(const PWStr: pWideString; out pMsg: WideString): Boolean; stdcall;
    function CloseDataSet(const PWStr: pWideString): Integer; stdcall;
    procedure AddUser(const ip: WideString; const host: WideString; const uname: WideString;
      const time: WideString; const state: WideString); safecall;
    procedure DelUser(const ip: WideString; const host: WideString; const uname: WideString;
      const time: WideString; const state: WideString); safecall;

  end;






implementation

end.
